
REM  ----  The MANSION Adventure  *.CMD file

COMMAND ANY        
IsGroupMember 303 ; LARGE DOG is a group member?
PutInCurrentRoom 303 ; Put noun (LARGE DOG) in current room
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
IsCarrying 206 ; GREEN SOAP is being carried?
Chance 15 ; 15% of returning TRUE?
PutInCurrentRoom 206 ; Put noun (GREEN SOAP) in current room
PrintMessage 6 ;     The soap slips out of your hands.             
END_COMMAND

COMMAND ANY        
NOT InRoom 300 ; LARGE CAT is NOT here?
NOT InRoom 303 ; LARGE DOG is NOT here?
Chance 30 ; 30% of returning TRUE?
AtLocation 4 ; Player is located at Hallway
 OR 
AtLocation 7 ; Player is located at Hallway
PrintMessage 8 ;     A mean-looking black cat storms into the room.
PutInCurrentRoom 300 ; Put noun (LARGE CAT) in current room
END_COMMAND

COMMAND ANY        
CounterEquals 1 10 ; Counter number 1 is equal to 10?
PrintMessage 16 ;     Suddenly you feel queasy. You collapse and die
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
AtLocation 29 ; Player is located at Pink Servants' Room
NOT InRoom 304 ; THIN GIRL is NOT here?
Chance 15 ; 15% of returning TRUE?
PutInCurrentRoom 304 ; Put noun (THIN GIRL) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
AtLocation 29 ; Player is located at Pink Servants' Room
NOT InRoom 305 ; TALL GIRL is NOT here?
Chance 15 ; 15% of returning TRUE?
PutInCurrentRoom 305 ; Put noun (TALL GIRL) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
AtLocation 29 ; Player is located at Pink Servants' Room
NOT InRoom 306 ; SHORT GIRL is NOT here?
Chance 15 ; 15% of returning TRUE?
PutInCurrentRoom 306 ; Put noun (SHORT GIRL) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
AtLocation 29 ; Player is located at Pink Servants' Room
NOT InRoom 307 ; TWIN GIRL is NOT here?
Chance 15 ; 15% of returning TRUE?
PutInCurrentRoom 307 ; Put noun (TWIN GIRL) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
AtLocation 31 ; Player is located at Blue Servants' Room
NOT InRoom 308 ; THIN BOY is NOT here?
Chance 15 ; 15% of returning TRUE?
PutInCurrentRoom 308 ; Put noun (THIN BOY) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
AtLocation 31 ; Player is located at Blue Servants' Room
NOT InRoom 309 ; TALL BOY is NOT here?
Chance 15 ; 15% of returning TRUE?
PutInCurrentRoom 309 ; Put noun (TALL BOY) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
AtLocation 31 ; Player is located at Blue Servants' Room
NOT InRoom 310 ; SHORT BOY is NOT here?
Chance 15 ; 15% of returning TRUE?
PutInCurrentRoom 310 ; Put noun (SHORT BOY) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
AtLocation 31 ; Player is located at Blue Servants' Room
NOT InRoom 311 ; CHUBBY BOY is NOT here?
Chance 15 ; 15% of returning TRUE?
PutInCurrentRoom 311 ; Put noun (CHUBBY BOY) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
NOT AtLocation 10 ; Player is NOT located at Storage Room
NOT InRoom 304 ; THIN GIRL is NOT here?
Chance 2 ; 2% of returning TRUE?
AtLocationGT 3 ; Player is at location greater than Your Bathroom
AtLocationLT 22 ; Player is at location less than Wizard's Bathroom
 OR 
AtLocationGT 25 ; Player is at location greater than Secret Room 
AtLocationLT 29 ; Player is at location less than Pink Servants' Room
PutInCurrentRoom 304 ; Put noun (THIN GIRL) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
NOT AtLocation 10 ; Player is NOT located at Storage Room
NOT InRoom 305 ; TALL GIRL is NOT here?
Chance 2 ; 2% of returning TRUE?
AtLocationGT 3 ; Player is at location greater than Your Bathroom
AtLocationLT 22 ; Player is at location less than Wizard's Bathroom
 OR 
AtLocationGT 25 ; Player is at location greater than Secret Room 
AtLocationLT 29 ; Player is at location less than Pink Servants' Room
PutInCurrentRoom 305 ; Put noun (TALL GIRL) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
NOT AtLocation 10 ; Player is NOT located at Storage Room
NOT InRoom 306 ; SHORT GIRL is NOT here?
Chance 2 ; 2% of returning TRUE?
AtLocationGT 3 ; Player is at location greater than Your Bathroom
AtLocationLT 22 ; Player is at location less than Wizard's Bathroom
 OR 
AtLocationGT 25 ; Player is at location greater than Secret Room 
AtLocationLT 29 ; Player is at location less than Pink Servants' Room
PutInCurrentRoom 306 ; Put noun (SHORT GIRL) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
NOT AtLocation 10 ; Player is NOT located at Storage Room
NOT InRoom 307 ; TWIN GIRL is NOT here?
Chance 2 ; 2% of returning TRUE?
AtLocationGT 3 ; Player is at location greater than Your Bathroom
AtLocationLT 22 ; Player is at location less than Wizard's Bathroom
 OR 
AtLocationGT 25 ; Player is at location greater than Secret Room 
AtLocationLT 29 ; Player is at location less than Pink Servants' Room
PutInCurrentRoom 307 ; Put noun (TWIN GIRL) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
NOT AtLocation 10 ; Player is NOT located at Storage Room
NOT InRoom 308 ; THIN BOY is NOT here?
Chance 2 ; 2% of returning TRUE?
AtLocationGT 3 ; Player is at location greater than Your Bathroom
AtLocationLT 22 ; Player is at location less than Wizard's Bathroom
 OR 
AtLocationGT 25 ; Player is at location greater than Secret Room 
AtLocationLT 29 ; Player is at location less than Pink Servants' Room
PutInCurrentRoom 308 ; Put noun (THIN BOY) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
NOT AtLocation 10 ; Player is NOT located at Storage Room
NOT InRoom 309 ; TALL BOY is NOT here?
Chance 2 ; 2% of returning TRUE?
AtLocationGT 3 ; Player is at location greater than Your Bathroom
AtLocationLT 22 ; Player is at location less than Wizard's Bathroom
 OR 
AtLocationGT 25 ; Player is at location greater than Secret Room 
AtLocationLT 29 ; Player is at location less than Pink Servants' Room
PutInCurrentRoom 309 ; Put noun (TALL BOY) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
NOT AtLocation 10 ; Player is NOT located at Storage Room
NOT InRoom 310 ; SHORT BOY is NOT here?
Chance 2 ; 2% of returning TRUE?
AtLocationGT 3 ; Player is at location greater than Your Bathroom
AtLocationLT 22 ; Player is at location less than Wizard's Bathroom
 OR 
AtLocationGT 25 ; Player is at location greater than Secret Room 
AtLocationLT 29 ; Player is at location less than Pink Servants' Room
PutInCurrentRoom 310 ; Put noun (SHORT BOY) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
NOT AtLocation 10 ; Player is NOT located at Storage Room
NOT InRoom 311 ; CHUBBY BOY is NOT here?
Chance 2 ; 2% of returning TRUE?
AtLocationGT 3 ; Player is at location greater than Your Bathroom
AtLocationLT 22 ; Player is at location less than Wizard's Bathroom
 OR 
AtLocationGT 25 ; Player is at location greater than Secret Room 
AtLocationLT 29 ; Player is at location less than Pink Servants' Room
PutInCurrentRoom 311 ; Put noun (CHUBBY BOY) in current room
PrintMessage 38 ;     Out of the corner of your eye, you see someone
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
InRoom 304 ; THIN GIRL is here?
Chance 20 ; 20% of returning TRUE?
Destroy 304 ; Destroy noun (THIN GIRL)
PrintMessage 39 ;     Someone leaves the room, muttering, "I better 
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
InRoom 305 ; TALL GIRL is here?
Chance 20 ; 20% of returning TRUE?
Destroy 305 ; Destroy noun (TALL GIRL)
PrintMessage 39 ;     Someone leaves the room, muttering, "I better 
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
InRoom 306 ; SHORT GIRL is here?
Chance 20 ; 20% of returning TRUE?
Destroy 306 ; Destroy noun (SHORT GIRL)
PrintMessage 39 ;     Someone leaves the room, muttering, "I better 
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
InRoom 307 ; TWIN GIRL is here?
Chance 20 ; 20% of returning TRUE?
Destroy 307 ; Destroy noun (TWIN GIRL)
PrintMessage 39 ;     Someone leaves the room, muttering, "I better 
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
InRoom 308 ; THIN BOY is here?
Chance 20 ; 20% of returning TRUE?
Destroy 308 ; Destroy noun (THIN BOY)
PrintMessage 39 ;     Someone leaves the room, muttering, "I better 
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
InRoom 309 ; TALL BOY is here?
Chance 20 ; 20% of returning TRUE?
Destroy 309 ; Destroy noun (TALL BOY)
PrintMessage 39 ;     Someone leaves the room, muttering, "I better 
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
InRoom 310 ; SHORT BOY is here?
Chance 20 ; 20% of returning TRUE?
Destroy 310 ; Destroy noun (SHORT BOY)
PrintMessage 39 ;     Someone leaves the room, muttering, "I better 
END_COMMAND

COMMAND ANY        
NOT VerbIsDirection ; is NOT trying to leave?
InRoom 311 ; CHUBBY BOY is here?
Chance 20 ; 20% of returning TRUE?
Destroy 311 ; Destroy noun (CHUBBY BOY)
PrintMessage 39 ;     Someone leaves the room, muttering, "I better 
END_COMMAND

COMMAND ANY        
TurnsEquals 100 ; Number of game turns is equal to 100?
PrintMessage 60 ;     You hear a car drive up and screech to a halt,
END_COMMAND

COMMAND ANY        
TurnsEquals 103 ; Number of game turns is equal to 103?
AtLocation 3 ; Player is located at Your Bathroom
PrintMessage 64 ;     "Argaharg," you hear faintly from the vent in 
TurnFlagON 15 ; Turn flag number 15 ON
END_COMMAND

COMMAND ANY        
TurnsEquals 103 ; Number of game turns is equal to 103?
PrintMessage 61 ;     You hear a door swinging open and two large fe
SendToRoom 312 13 ; Put item (EVIL WIZARD) in room 13 (Entry Room)
END_COMMAND

COMMAND ANY        
TurnsEquals 105 ; Number of game turns is equal to 105?
NOT AtLocation 2 ; Player is NOT located at Your Bedroom
NOT AtLocation 3 ; Player is NOT located at Your Bathroom
PrintMessage 62 ;     Suddenly the wizard appears in front of you. "
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND ANY        
TurnsEquals 105 ; Number of game turns is equal to 105?
IsGroupMember 303 ; LARGE DOG is a group member?
SendToRoom 303 2 ; Put item (LARGE DOG) in room 2 (Your Bedroom)
END_COMMAND

COMMAND ANY        
TurnsEquals 105 ; Number of game turns is equal to 105?
IsSomewhere 239 ; LARGE SAFE is somewhere?
PrintMessage 69 ;     You hear the door to your room open, and see t
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND ANY        
TurnsEquals 105 ; Number of game turns is equal to 105?
GoToRoom 2 ; Go to location 2 -- Your Bedroom
Present 203 ; BLUE RING is here?
 OR 
Present 303 ; LARGE DOG is here?
 OR 
Present 215 ; ORANGE DOORMAT is here?
 OR 
Present 216 ; PRETTY FLOWER is here?
 OR 
Present 217 ; DIAMOND RING is here?
 OR 
Present 218 ; RUBY BRACELET is here?
PrintMessage 67 ;     You hear your bedroom door open and see the wi
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND ANY        
TurnsEquals 105 ; Number of game turns is equal to 105?
GoToRoom 2 ; Go to location 2 -- Your Bedroom
Present 213 ; CHICKEN BONE is here?
 OR 
Present 224 ; DISGUSTING FOOD is here?
 OR 
Present 225 ; COLD CHICKEN is here?
 OR 
Present 227 ; BLUE DOORMAT is here?
 OR 
Present 248 ; MEASURING SPOONS is here?
 OR 
Present 229 ; LITTLE BOOK is here?
PrintMessage 67 ;     You hear your bedroom door open and see the wi
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND ANY        
TurnsEquals 105 ; Number of game turns is equal to 105?
GoToRoom 2 ; Go to location 2 -- Your Bedroom
Present 223 ; WHITE REFRIGERATOR is here?
 OR 
Present 234 ; BLUE DISK is here?
 OR 
Present 235 ; GRAY DISK is here?
 OR 
Present 236 ; WHITE DISK is here?
 OR 
Present 241 ; FIVE DOLLARS is here?
 OR 
Present 271 ; GREEN BOOKLET is here?
PrintMessage 67 ;     You hear your bedroom door open and see the wi
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND ANY        
TurnsEquals 105 ; Number of game turns is equal to 105?
GoToRoom 2 ; Go to location 2 -- Your Bedroom
Present 243 ; ODD-LOOKING BOX is here?
 OR 
Present 245 ; PINK APRON is here?
 OR 
Present 246 ; PINK CAP is here?
 OR 
Present 249 ; SILVER KEY is here?
 OR 
Present 250 ; BIRTH CERTIFICATE is here?
 OR 
Present 272 ; PINK ERASER is here?
PrintMessage 67 ;     You hear your bedroom door open and see the wi
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND ANY        
TurnsEquals 105 ; Number of game turns is equal to 105?
IsSomewhere 302 ; LARGE DOG is somewhere?
SendToRoom 249 21 ; Put item (SILVER KEY) in room 21 (Wizard's Bedroom)
PrintMessage 140 ;     The door to your room opens and the wizard com
SwapLocations 302 301 ; Swap locations of nouns  (LARGE DOG) and (LARGE DOG)
MinusScore 1 ; Subtract 1 from game score
DoneWithTurn
END_COMMAND

COMMAND ANY        
TurnsEquals 105 ; Number of game turns is equal to 105?
IsNoWhere 302 ; LARGE DOG is in Room Zero?
SendToRoom 249 21 ; Put item (SILVER KEY) in room 21 (Wizard's Bedroom)
PrintMessage 63 ;     You hear your door open and see the wizard com
DoneWithTurn
END_COMMAND

COMMAND ANY        
IsSomewhere 312 ; EVIL WIZARD is somewhere?
TurnsGT 105 ; Number of game turns is greater than 105?
NOT InRoom 312 ; EVIL WIZARD is NOT here?
AtLocationGT 3 ; Player is at location greater than Your Bathroom
AtLocationLT 29 ; Player is at location less than Pink Servants' Room
NOT AtLocation 10 ; Player is NOT located at Storage Room
Chance 16 ; 16% of returning TRUE?
PutInCurrentRoom 312 ; Put noun (EVIL WIZARD) in current room
PrintMessage 65 ;     The wizard stalks into the room. You stop what
DoneWithTurn
END_COMMAND

COMMAND ANY        
InRoom 312 ; EVIL WIZARD is here?
InRoom 307 ; TWIN GIRL is here?
PrintMessage 71 ;     The wizard looks from you to Clara and back ag
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND ANY        
InRoom 312 ; EVIL WIZARD is here?
AtLocationGT 21 ; Player is at location greater than Wizard's Bedroom
AtLocationLT 26 ; Player is at location less than Staircase
PrintMessage 70 ;     The wizard looks at you and says angrily, "Cla
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND ANY        
InRoom 312 ; EVIL WIZARD is here?
NOT IsWearing 245 ; PINK APRON is NOT being worn?
 OR 
NOT IsWearing 246 ; PINK CAP is NOT being worn?
PrintMessage 68 ;     The wizard eyes you. "Clara, why aren't you in
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND ANY        
InRoom 312 ; EVIL WIZARD is here?
Present 243 ; ODD-LOOKING BOX is here?
PrintMessage 72 ;     The wizard peers at you and all around the roo
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND ANY        
InRoom 312 ; EVIL WIZARD is here?
Present 250 ; BIRTH CERTIFICATE is here?
PrintMessage 73 ;     The wizard looks around the room and then peer
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND ANY        
InRoom 312 ; EVIL WIZARD is here?
Present 272 ; PINK ERASER is here?
PrintMessage 136 ;     The wizard looks around suspiciously. Suddenly
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND ANY        
AtLocation 34 ; Player is located at Wizard's Garden
FlagOFF 24 ; Flag number 24 is OFF?
NOT VerbIsDirection ; is NOT trying to leave?
InRoom 303 ; LARGE DOG is here?
PrintMessage 83 ;     Bitsy suddenly barks. A white streak zooms out
Destroy 313 ; Destroy noun (WHITE RABBIT)
TurnFlagON 24 ; Turn flag number 24 ON
FlagOFF 17 ; Flag number 17 is OFF?
Destroy 255 ; Destroy noun (GOLD COLLAR)
END_COMMAND

COMMAND ANY        
AtLocation 34 ; Player is located at Wizard's Garden
NOT VerbIsDirection ; is NOT trying to leave?
NOT InRoom 303 ; LARGE DOG is NOT here?
PutInCurrentRoom 313 ; Put noun (WHITE RABBIT) in current room
TurnFlagOFF 24 ; Turn flag number 24 OFF
PrintMessage 86 ;     There is a large white rabbit grazing on the c
IsNoWhere 255 ; GOLD COLLAR is in Room Zero?
PutInCurrentRoom 255 ; Put noun (GOLD COLLAR) in current room
PrintMessage 84 ;     It is wearing a golden collar that seems to be
END_COMMAND

COMMAND ANY        
VerbIsDirection ; is trying to leave?
FlagON 18 ; Flag number 18 is ON?
AtLocationLT 45 ; Player is at location less than none
 OR 
AtLocationGT 59 ; Player is at location greater than Flying
PrintMessage 94 ;     It's a little hard to walk around when you're 
DoneWithTurn
END_COMMAND

COMMAND ANY        
FlagON 18 ; Flag number 18 is ON?
PutInCurrentRoom 258 ; Put noun (PAPER AIRPLANE) in current room
PutInCurrentRoom 259 ; Put noun (RED BUTTON) in current room
END_COMMAND

COMMAND ANY        
FlagON 22 ; Flag number 22 is ON?
IsSomewhere 303 ; LARGE DOG is somewhere?
IsGroupMember 303 ; LARGE DOG is a group member?
PutInCurrentRoom 258 ; Put noun (PAPER AIRPLANE) in current room
END_COMMAND

COMMAND ANY        
VerbIsDirection ; is trying to leave?
IsSomewhere 303 ; LARGE DOG is somewhere?
IsGroupMember 303 ; LARGE DOG is a group member?
FlagON 22 ; Flag number 22 is ON?
PrintMessage 126 ;     The dog follows behind you, the plane still ba
END_COMMAND

COMMAND ANY        
VerbIsDirection ; is trying to leave?
AtLocationGT 44 ; Player is at location greater than Wizard's Limousine
AtLocationLT 60 ; Player is at location less than Dirt Road
PrintMessage 127 ;     You steer the plane $VERB$.                   
END_COMMAND

COMMAND ANY        
AtLocationGT 31 ; Player is at location greater than Blue Servants' Room
IsSomewhere 312 ; EVIL WIZARD is somewhere?
PrintMessage 77 ;     Suddenly the wizard appears in front of you. F
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND ANY        
AtLocationGT 31 ; Player is at location greater than Blue Servants' Room
FlagOFF 15 ; Flag number 15 is OFF?
PrintMessage 78 ;     Suddenly a fat dwarf appears in front of you. 
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND ANY        
AtLocation 13 ; Player is located at Entry Room
IsCarrying 258 ; PAPER AIRPLANE is being carried?
 OR 
Present 303 ; LARGE DOG is here?
FlagON 22 ; Flag number 22 is ON?
PrintMessage 96 ;     "Error! Error! Player is in house with airplan
GoToRoom 32 ; Go to location 32 -- Wizard's front yard
DoneWithTurn
END_COMMAND

COMMAND ANY        
AtLocation 16 ; Player is located at Kitchen
IsCarrying 258 ; PAPER AIRPLANE is being carried?
 OR 
Present 303 ; LARGE DOG is here?
FlagON 22 ; Flag number 22 is ON?
PrintMessage 96 ;     "Error! Error! Player is in house with airplan
GoToRoom 33 ; Go to location 33 -- Wizard's Back Yard
DoneWithTurn
END_COMMAND

COMMAND LOOK FLOOR    
AtLocation 2 ; Player is located at Your Bedroom
PrintMessage 1 ;     You look closely at the cracked stone floor.  
FlagOFF 1 ; Flag number 1 is OFF?
PrintMessage 2 ;     Suddenly you notice a ring wedged into one of 
GetIt 203 ; Get noun 203 -- BLUE RING
PlusScore 1 ; Add 1 to game score
SetVariableTo 1 0 ; Set variable number 1 to 0
TurnFlagON 1 ; Turn flag number 1 ON
DoneWithTurn
END_COMMAND

COMMAND LOOK FLOOR    
DoneWithTurn
END_COMMAND

COMMAND LOOK BOOKS    
AtLocation 18 ; Player is located at Library
VariableGT 2 0 ; Variable number 2 is equal to 0?
GetIt 229 ; Get noun 229 -- LITTLE BOOK
AddToVariable 2 1 ; Increase variable number 2 by 1
PlusScore 1 ; Add 1 to game score
PrintMessage 19 ;     You pull out a few books at random. Most of th
DoneWithTurn
END_COMMAND

COMMAND LOOK BOOKS    
AtLocation 18 ; Player is located at Library
VariableGT 2 1 ; Variable number 2 is equal to 1?
GetIt 271 ; Get noun 271 -- GREEN BOOKLET
AddToVariable 2 1 ; Increase variable number 2 by 1
PrintMessage 130 ;     You pull out a few books at random. Most of th
DoneWithTurn
END_COMMAND

COMMAND LOOK BOOKS    
AtLocation 18 ; Player is located at Library
VariableGT 2 2 ; Variable number 2 is equal to 2?
PrintMessage 20 ;     You pull out a few more books and look at them
DoneWithTurn
END_COMMAND

COMMAND EXAMINE FLOOR    
ReDirectTo LOOK FLOOR    
END_COMMAND

COMMAND EXAMINE BOOKS    
ReDirectTo LOOK BOOKS    
END_COMMAND

COMMAND EAST        
AtLocation 2 ; Player is located at Your Bedroom
IsWearing 203 ; BLUE RING is being worn?
VariableLT 1 4 ; Variable number 1 is less than 4?
GoToRoom 4 ; Go to location 4 -- Hallway
PrintMessage 3 ;     You actually pass through the locked door! You
AddToVariable 1 1 ; Increase variable number 1 by 1
DoneWithTurn
END_COMMAND

COMMAND EAST        
AtLocation 2 ; Player is located at Your Bedroom
IsWearing 203 ; BLUE RING is being worn?
VariableGT 1 4 ; Variable number 1 is equal to 4?
GoToRoom 4 ; Go to location 4 -- Hallway
PrintMessage 4 ;     For the fifth time, you pass right through the
Destroy 203 ; Destroy noun (BLUE RING)
DoneWithTurn
END_COMMAND

COMMAND EAST        
AtLocation 10 ; Player is located at Storage Room
IsWearing 203 ; BLUE RING is being worn?
VariableLT 1 4 ; Variable number 1 is less than 4?
GoToRoom 9 ; Go to location 9 -- Staircase
PrintMessage 3 ;     You actually pass through the locked door! You
AddToVariable 1 1 ; Increase variable number 1 by 1
DoneWithTurn
END_COMMAND

COMMAND EAST        
AtLocation 10 ; Player is located at Storage Room
IsWearing 203 ; BLUE RING is being worn?
VariableGT 1 4 ; Variable number 1 is equal to 4?
GoToRoom 9 ; Go to location 9 -- Staircase
PrintMessage 4 ;     For the fifth time, you pass right through the
Destroy 203 ; Destroy noun (BLUE RING)
DoneWithTurn
END_COMMAND

COMMAND EAST        
AtLocation 22 ; Player is located at Wizard's Bathroom
GoToRoom 25 ; Go to location 25 -- Secret Room 
PrintMessage 31 ;     You walk towards one of the door's reflections
DoneWithTurn
END_COMMAND

COMMAND EAST        
AtLocation 60 ; Player is located at Dirt Road
IsCarrying 258 ; PAPER AIRPLANE is being carried?
PrintMessage 96 ;     "Error! Error! Player is in house with airplan
DoneWithTurn
END_COMMAND

COMMAND WEST        
AtLocation 4 ; Player is located at Hallway
NOT InRoom 300 ; LARGE CAT is NOT here?
IsWearing 203 ; BLUE RING is being worn?
VariableLT 1 4 ; Variable number 1 is less than 4?
GoToRoom 2 ; Go to location 2 -- Your Bedroom
PrintMessage 3 ;     You actually pass through the locked door! You
AddToVariable 1 1 ; Increase variable number 1 by 1
DoneWithTurn
END_COMMAND

COMMAND WEST        
AtLocation 4 ; Player is located at Hallway
NOT InRoom 300 ; LARGE CAT is NOT here?
IsWearing 203 ; BLUE RING is being worn?
VariableGT 1 4 ; Variable number 1 is equal to 4?
GoToRoom 2 ; Go to location 2 -- Your Bedroom
PrintMessage 4 ;     For the fifth time, you pass right through the
Destroy 203 ; Destroy noun (BLUE RING)
DoneWithTurn
END_COMMAND

COMMAND WEST        
AtLocation 9 ; Player is located at Staircase
IsWearing 203 ; BLUE RING is being worn?
VariableLT 1 4 ; Variable number 1 is less than 4?
GoToRoom 10 ; Go to location 10 -- Storage Room
PrintMessage 3 ;     You actually pass through the locked door! You
AddToVariable 1 1 ; Increase variable number 1 by 1
DoneWithTurn
END_COMMAND

COMMAND WEST        
AtLocation 9 ; Player is located at Staircase
IsWearing 203 ; BLUE RING is being worn?
VariableGT 1 4 ; Variable number 1 is equal to 4?
GoToRoom 10 ; Go to location 10 -- Storage Room
PrintMessage 4 ;     For the fifth time, you pass right through the
Destroy 203 ; Destroy noun (BLUE RING)
DoneWithTurn
END_COMMAND

COMMAND WEST        
AtLocation 63 ; Player is located at Dirt Road
IsCarrying 258 ; PAPER AIRPLANE is being carried?
PrintMessage 96 ;     "Error! Error! Player is in house with airplan
DoneWithTurn
END_COMMAND

COMMAND GET        
NounIsCreature ;     is a creature?
NOUNPresent ; $NOUN$ is here?
PrintMessage 37 ;     Don't do that!                                
DoneWithTurn
END_COMMAND

COMMAND GET JUNK    
AtLocation 10 ; Player is located at Storage Room
PrintMessage 5 ;     Why do that? It's such junk!                  
DoneWithTurn
END_COMMAND

COMMAND GET SOAP    
InRoom 206 ; GREEN SOAP is here?
Chance 30 ; 30% of returning TRUE?
PrintMessage 6 ;     The soap slips out of your hands.             
DoneWithTurn
END_COMMAND

COMMAND GET BONE    
InRoom 302 ; LARGE DOG is here?
PrintMessage 10 ;     Hands trembling, you loosen the bone and pull 
PlusScore 1 ; Add 1 to game score
SwapLocations 302 303 ; Swap locations of nouns  (LARGE DOG) and (LARGE DOG)
AddToGroup 303 ; Add item 303 (LARGE DOG) to group
DoneWithTurn
END_COMMAND

COMMAND GET FOOD    
InRoom 224 ; DISGUSTING FOOD is here?
LoadWeightLT 21 ; Playing is carrying load less than 21 pounds?
GetIt 224 ; Get noun 224 -- DISGUSTING FOOD
PrintMessage 18 ;     You manage to carry all of the jars of food. U
DoneWithTurn
END_COMMAND

COMMAND GET BOOKS    
ReDirectTo LOOK BOOKS    
END_COMMAND

COMMAND GET DOLLARS    
AtLocation 23 ; Player is located at Money Bin
FlagOFF 10 ; Flag number 10 is OFF?
GetIt 241 ; Get noun 241 -- FIVE DOLLARS
PrintMessage 32 ;     You look through the heap of money and get all
TurnFlagON 10 ; Turn flag number 10 ON
PlusScore 1 ; Add 1 to game score
DoneWithTurn
END_COMMAND

COMMAND GET DOLLARS    
AtLocation 23 ; Player is located at Money Bin
FlagON 10 ; Flag number 10 is ON?
PrintMessage 33 ;     You already took all the American money, and y
DoneWithTurn
END_COMMAND

COMMAND GET COLLAR    
InRoom 255 ; GOLD COLLAR is here?
FlagOFF 17 ; Flag number 17 is OFF?
PrintMessage 85 ;     You find a latch in the collar and remove it. 
GetIt 255 ; Get noun 255 -- GOLD COLLAR
PlusScore 1 ; Add 1 to game score
TurnFlagON 17 ; Turn flag number 17 ON
DoneWithTurn
END_COMMAND

COMMAND GET RAFT    
Present 262 ; INFLATABLE RAFT is here?
PrintMessage 100 ;     Though the raft is very light, it's just a lit
DoneWithTurn
END_COMMAND

COMMAND GET SHOVEL    
NOUNinRoom ; $NOUN$ is in current room?
AtLocation 62 ; Player is located at Store
PrintMessage 108 ;     The shop keeper stops you. "You're not getting
DoneWithTurn
END_COMMAND

COMMAND GET FLASHLIGHT    
ReDirectTo GET SHOVEL    
END_COMMAND

COMMAND GET MAP    
ReDirectTo GET SHOVEL    
END_COMMAND

COMMAND GET ALL    
AtLocation 62 ; Player is located at Store
PrintMessage 108 ;     The shop keeper stops you. "You're not getting
DoneWithTurn
END_COMMAND

COMMAND GET DISK    
AtLocation 19 ; Player is located at Computer Room
NOUNIsNumber 234 ; TRUE if $NOUN$ is NOUN/CREATURE number 234?
FlagON 7 ; Flag number 7 is ON?
GetIt 234 ; Get noun 234 -- BLUE DISK
PrintMessage 24 ;     You take the $ADJECTIVE$ disk from the drive a
TurnFlagOFF 7 ; Turn flag number 7 OFF
DoneWithTurn
END_COMMAND

COMMAND GET DISK    
AtLocation 19 ; Player is located at Computer Room
NOUNIsNumber 235 ; TRUE if $NOUN$ is NOUN/CREATURE number 235?
FlagON 8 ; Flag number 8 is ON?
GetIt 235 ; Get noun 235 -- GRAY DISK
PrintMessage 24 ;     You take the $ADJECTIVE$ disk from the drive a
TurnFlagOFF 8 ; Turn flag number 8 OFF
DoneWithTurn
END_COMMAND

COMMAND GET DISK    
AtLocation 19 ; Player is located at Computer Room
NOUNIsNumber 236 ; TRUE if $NOUN$ is NOUN/CREATURE number 236?
FlagON 9 ; Flag number 9 is ON?
GetIt 236 ; Get noun 236 -- WHITE DISK
PrintMessage 24 ;     You take the $ADJECTIVE$ disk from the drive a
TurnFlagOFF 9 ; Turn flag number 9 OFF
DoneWithTurn
END_COMMAND

COMMAND GET AIRPLANE    
FlagON 22 ; Flag number 22 is ON?
LoadWeightLT 1 ; Playing is carrying load less than 1 pounds?
TurnFlagOFF 22 ; Turn flag number 22 OFF
GetIt 258 ; Get noun 258 -- PAPER AIRPLANE
PrintMessage 125 ;     You take the plane off of the dog's back.     
DoneWithTurn
END_COMMAND

COMMAND GET AIRPLANE    
FlagON 18 ; Flag number 18 is ON?
PrintMessage 128 ;     You can't get the plane while you're in it, st
DoneWithTurn
END_COMMAND

COMMAND THROW        
Present 312 ; EVIL WIZARD is here?
PrintMessage 120 ;     The wizard stops you from throwing it. "Don't 
DoneWithTurn
END_COMMAND

COMMAND THROW SOAP IN CAT
InRoom 300 ; LARGE CAT is here?
IsCarrying 206 ; GREEN SOAP is being carried?
DropIt 206 ; Drop noun 206 -- GREEN SOAP
Destroy 300 ; Destroy noun (LARGE CAT)
PrintMessage 7 ;     You throw the little bar of soap directly in f
FlagOFF 2 ; Flag number 2 is OFF?
PlusScore 1 ; Add 1 to game score
TurnFlagON 2 ; Turn flag number 2 ON
DoneWithTurn
END_COMMAND

COMMAND THROW SOAP IN CAT
DoneWithTurn
END_COMMAND

COMMAND THROW BONE IN DOG
InRoom 301 ; LARGE DOG is here?
IsCarrying 213 ; CHICKEN BONE is being carried?
Destroy 213 ; Destroy noun (CHICKEN BONE)
PrintMessage 9 ;     You throw the chicken bone to the dog, hoping 
SwapLocations 301 302 ; Swap locations of nouns  (LARGE DOG) and (LARGE DOG)
PlusScore 1 ; Add 1 to game score
DoneWithTurn
END_COMMAND

COMMAND THROW CHICKEN IN DOG
InRoom 301 ; LARGE DOG is here?
IsCarrying 225 ; COLD CHICKEN is being carried?
PrintMessage 28 ;     You throw the chicken to the dog, but he won't
DropIt 225 ; Drop noun 225 -- COLD CHICKEN
DoneWithTurn
END_COMMAND

COMMAND THROW AIRPLANE    
AtLocation 35 ; Player is located at Wizard's Driveway
IsCarrying 257 ; PAPER AIRPLANE is being carried?
Destroy 257 ; Destroy noun (PAPER AIRPLANE)
PutInCurrentRoom 258 ; Put noun (PAPER AIRPLANE) in current room
PrintMessage 90 ;     You throw the paper airplane. It soars up in t
PlusScore 1 ; Add 1 to game score
DoneWithTurn
END_COMMAND

COMMAND THROW AIRPLANE    
IsCarrying 257 ; PAPER AIRPLANE is being carried?
PutInCurrentRoom 257 ; Put noun (PAPER AIRPLANE) in current room
PrintMessage 91 ;     You throw the airplane. It soars along and lan
DoneWithTurn
END_COMMAND

COMMAND OPEN FLOWER    
Present 216 ; PRETTY FLOWER is here?
Present 312 ; EVIL WIZARD is here?
PrintMessage 79 ;     You can't do that right now. The wizard just w
DoneWithTurn
END_COMMAND

COMMAND OPEN FLOWER    
Present 216 ; PRETTY FLOWER is here?
FlagOFF 3 ; Flag number 3 is OFF?
PrintMessage 11 ;     You pinch open several blossoms, one by one. Y
GetIt 217 ; Get noun 217 -- DIAMOND RING
PlusScore 1 ; Add 1 to game score
TurnFlagON 3 ; Turn flag number 3 ON
DoneWithTurn
END_COMMAND

COMMAND OPEN FLOWER    
Present 216 ; PRETTY FLOWER is here?
FlagON 3 ; Flag number 3 is ON?
PrintMessage 12 ;     You find nothing else there.                  
DoneWithTurn
END_COMMAND

COMMAND PINCH FLOWER    
ReDirectTo OPEN FLOWER    
END_COMMAND

COMMAND DIG FLOWER IN FLOWER
Present 216 ; PRETTY FLOWER is here?
Present 312 ; EVIL WIZARD is here?
PrintMessage 79 ;     You can't do that right now. The wizard just w
DoneWithTurn
END_COMMAND

COMMAND DIG FLOWER IN FLOWER
Present 216 ; PRETTY FLOWER is here?
FlagOFF 4 ; Flag number 4 is OFF?
PrintMessage 13 ;     You dig around in the soil with your fingers. 
GetIt 218 ; Get noun 218 -- RUBY BRACELET
PlusScore 1 ; Add 1 to game score
TurnFlagON 4 ; Turn flag number 4 ON
DoneWithTurn
END_COMMAND

COMMAND DIG FLOWER IN FLOWER
FlagON 4 ; Flag number 4 is ON?
Present 216 ; PRETTY FLOWER is here?
PrintMessage 12 ;     You find nothing else there.                  
DoneWithTurn
END_COMMAND

COMMAND DIG FLOWER    
ReDirectTo DUMMY_VERB1 FLOWER IN FLOWER
END_COMMAND

COMMAND DIG        
NOUNPresent ; $NOUN$ is here?
PrintMessage 14 ;     You can't dig in that!                        
DoneWithTurn
END_COMMAND

COMMAND DIG        
IsCarrying 265 ; SMALL SHOVEL is being carried?
AtLocation 34 ; Player is located at Wizard's Garden
PrintMessage 115 ;     You dig around in the garden, but find nothing
DoneWithTurn
END_COMMAND

COMMAND DIG        
IsCarrying 265 ; SMALL SHOVEL is being carried?
PrintMessage 116 ;     You don't feel like working hard enough to dig
DoneWithTurn
END_COMMAND

COMMAND DIG        
NOT IsCarrying 265 ; SMALL SHOVEL is NOT being carried?
PrintMessage 117 ;     You won't get too far digging without a shovel
DoneWithTurn
END_COMMAND

COMMAND EAT        
Present 312 ; EVIL WIZARD is here?
PrintMessage 119 ;     "Don't eat between meals!" scolds the wizard, 
DoneWithTurn
END_COMMAND

COMMAND EAT FOOD    
Present 224 ; DISGUSTING FOOD is here?
PrintMessage 15 ;     You close your eyes and choose a slimy morsel 
FlagOFF 5 ; Flag number 5 is OFF?
TurnFlagON 5 ; Turn flag number 5 ON
TurnCounterON 1 ; Turn counter number 1 ON
DoneWithTurn
END_COMMAND

COMMAND EAT CHICKEN    
IsCarrying 225 ; COLD CHICKEN is being carried?
PrintMessage 17 ;     You gnaw the chicken to the bone. Mmm, delicio
SwapLocations 225 213 ; Swap locations of nouns  (COLD CHICKEN) and (CHICKEN BONE)
DoneWithTurn
END_COMMAND

COMMAND SIT        
PrintMessage 21 ;     I don't think laziness is appropriate just now
DoneWithTurn
END_COMMAND

COMMAND SIT        
PrintMessage 21 ;     I don't think laziness is appropriate just now
DoneWithTurn
END_COMMAND

COMMAND SIT        
PrintMessage 21 ;     I don't think laziness is appropriate just now
DoneWithTurn
END_COMMAND

COMMAND PUT DISK IN COMPUTER
AtLocation 19 ; Player is located at Computer Room
NOUNIsNumber 234 ; TRUE if $NOUN$ is NOUN/CREATURE number 234?
FlagOFF 7 ; Flag number 7 is OFF?
FlagOFF 8 ; Flag number 8 is OFF?
FlagOFF 9 ; Flag number 9 is OFF?
IsCarrying 234 ; BLUE DISK is being carried?
PrintMessage 22 ;     You put the $ADJECTIVE$ disk in the disk drive
TurnFlagON 7 ; Turn flag number 7 ON
Destroy 234 ; Destroy noun (BLUE DISK)
DoneWithTurn
END_COMMAND

COMMAND PUT DISK IN COMPUTER
AtLocation 19 ; Player is located at Computer Room
NOUNIsNumber 235 ; TRUE if $NOUN$ is NOUN/CREATURE number 235?
FlagOFF 7 ; Flag number 7 is OFF?
FlagOFF 8 ; Flag number 8 is OFF?
FlagOFF 9 ; Flag number 9 is OFF?
IsCarrying 235 ; GRAY DISK is being carried?
PrintMessage 22 ;     You put the $ADJECTIVE$ disk in the disk drive
TurnFlagON 8 ; Turn flag number 8 ON
Destroy 235 ; Destroy noun (GRAY DISK)
DoneWithTurn
END_COMMAND

COMMAND PUT DISK IN COMPUTER
AtLocation 19 ; Player is located at Computer Room
NOUNIsNumber 236 ; TRUE if $NOUN$ is NOUN/CREATURE number 236?
FlagOFF 7 ; Flag number 7 is OFF?
FlagOFF 8 ; Flag number 8 is OFF?
FlagOFF 9 ; Flag number 9 is OFF?
IsCarrying 236 ; WHITE DISK is being carried?
PrintMessage 22 ;     You put the $ADJECTIVE$ disk in the disk drive
TurnFlagON 9 ; Turn flag number 9 ON
Destroy 236 ; Destroy noun (WHITE DISK)
DoneWithTurn
END_COMMAND

COMMAND PUT DISK IN COMPUTER
AtLocation 19 ; Player is located at Computer Room
NOUNisCarrying ; $NOUN$ is being carried?
FlagON 7 ; Flag number 7 is ON?
 OR 
FlagON 8 ; Flag number 8 is ON?
 OR 
FlagON 9 ; Flag number 9 is ON?
PrintMessage 23 ;     There already is a disk in the computer.      
DoneWithTurn
END_COMMAND

COMMAND PUT AIRPLANE IN DOG
Present 303 ; LARGE DOG is here?
IsCarrying 258 ; PAPER AIRPLANE is being carried?
PutInCurrentRoom 258 ; Put noun (PAPER AIRPLANE) in current room
TurnFlagON 22 ; Turn flag number 22 ON
PrintMessage 123 ;     You put the giant plane on top of the dog's ba
FlagOFF 23 ; Flag number 23 is OFF?
TurnFlagON 23 ; Turn flag number 23 ON
PlusScore 1 ; Add 1 to game score
DoneWithTurn
END_COMMAND

COMMAND PUT AIRPLANE IN DOG
DoneWithTurn
END_COMMAND

COMMAND PLAY DISK    
AtLocation 19 ; Player is located at Computer Room
NOUNIsNumber 234 ; TRUE if $NOUN$ is NOUN/CREATURE number 234?
FlagON 7 ; Flag number 7 is ON?
PrintMessage 25 ;     Word Wizard is not a game, you soon discover. 
DoneWithTurn
END_COMMAND

COMMAND PLAY DISK    
AtLocation 19 ; Player is located at Computer Room
NOUNIsNumber 236 ; TRUE if $NOUN$ is NOUN/CREATURE number 236?
FlagON 9 ; Flag number 9 is ON?
PrintMessage 26 ;     You play Magic Mansion for a little while. It 
DoneWithTurn
END_COMMAND

COMMAND PLAY DISK    
AtLocation 19 ; Player is located at Computer Room
NOUNIsNumber 235 ; TRUE if $NOUN$ is NOUN/CREATURE number 235?
FlagON 8 ; Flag number 8 is ON?
PrintMessage 27 ;     You play a game of Magic Master. It is a fun, 
DoneWithTurn
END_COMMAND

COMMAND PLAY DISK    
AtLocation 19 ; Player is located at Computer Room
NOUNisCarrying ; $NOUN$ is being carried?
PrintMessage 121 ;     You have to put it in the computer first!     
DoneWithTurn
END_COMMAND

COMMAND TURN SIXTEENTWELVEFIFTEENSE    
InRoom 238 ; COMBINATION SIXTEENTWELVEFIFTEENSE is here?
 ChangePassageway    2   23; Change NORTH passage TO Room number 23 (Money Bin)
SwapLocations 237 239 ; Swap locations of nouns  (LARGE SAFE) and (LARGE SAFE)
Destroy 238 ; Destroy noun (COMBINATION SIXTEENTWELVEFIFTEENSE)
PrintMessage 29 ;     You turn the lock back and forth, carefully st
FlagOFF 21 ; Flag number 21 is OFF?
PlusScore 1 ; Add 1 to game score
TurnFlagON 21 ; Turn flag number 21 ON
DoneWithTurn
END_COMMAND

COMMAND TURN SIXTEENTWELVEFIFTEENSE    
DoneWithTurn
END_COMMAND

COMMAND LOCK SAFE    
InRoom 239 ; LARGE SAFE is here?
 ChangePassageway    2   0; Change NORTH passage TO Room number 0 (Nowhere)
SwapLocations 239 237 ; Swap locations of nouns  (LARGE SAFE) and (LARGE SAFE)
PutInCurrentRoom 238 ; Put noun (COMBINATION SIXTEENTWELVEFIFTEENSE) in current room
PrintMessage 30 ;     You push the door shut and hear it click and l
DoneWithTurn
END_COMMAND

COMMAND CLOSE SAFE    
ReDirectTo LOCK SAFE    
END_COMMAND

COMMAND STAY DOG    
IsNoWhere 303 ; LARGE DOG is in Room Zero?
PrintMessage 36 ;     It isn't likely that the dog is going to obey 
DoneWithTurn
END_COMMAND

COMMAND STAY DOG    
Present 312 ; EVIL WIZARD is here?
IsSomewhere 303 ; LARGE DOG is somewhere?
PrintMessage 66 ;     As the wizard hears the first word come out of
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND STAY DOG    
IsSomewhere 303 ; LARGE DOG is somewhere?
IsGroupMember 303 ; LARGE DOG is a group member?
RemoveFromGroup 303 ; Remove item 303 (LARGE DOG) from group
PrintMessage 34 ;     "Bitsy, stay," you tell the dog firmly. He sit
DoneWithTurn
END_COMMAND

COMMAND COME DOG    
IsNoWhere 303 ; LARGE DOG is in Room Zero?
PrintMessage 36 ;     It isn't likely that the dog is going to obey 
DoneWithTurn
END_COMMAND

COMMAND COME DOG    
Present 312 ; EVIL WIZARD is here?
IsSomewhere 303 ; LARGE DOG is somewhere?
PrintMessage 66 ;     As the wizard hears the first word come out of
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND COME DOG    
IsSomewhere 303 ; LARGE DOG is somewhere?
NOT IsGroupMember 303 ; LARGE DOG is NOT a group member?
 OR 
NOT InRoom 303 ; LARGE DOG is NOT here?
PutInCurrentRoom 303 ; Put noun (LARGE DOG) in current room
AddToGroup 303 ; Add item 303 (LARGE DOG) to group
PrintMessage 35 ;     "Bitsy, come!" you cry loudly. This dog has ma
Present 300 ; LARGE CAT is here?
PrintMessage 129 ;     The cat takes one look at the dog and disappea
Destroy 300 ; Destroy noun (LARGE CAT)
DoneWithTurn
END_COMMAND

COMMAND COME DOG    
DoneWithTurn
END_COMMAND

COMMAND TELL        
InRoom 312 ; EVIL WIZARD is here?
PrintMessage 66 ;     As the wizard hears the first word come out of
EndGame ; Game ends at end of turn
DoneWithTurn
END_COMMAND

COMMAND TELL BOY    
IsNoWhere 312 ; EVIL WIZARD is in Room Zero?
TurnsGT 105 ; Number of game turns is greater than 105?
NOUNPresent ; $NOUN$ is here?
PrintMessage 40 ;     "Hey, that was great how you got rid of the wi
DoneWithTurn
END_COMMAND

COMMAND TELL BOY    
NOUNPresent ; $NOUN$ is here?
RandomMessage 44 46 ; Print random message between 44 and 46
DoneWithTurn
END_COMMAND

COMMAND TELL BOY    
NOT NOUNPresent ; $NOUN$ is NOT here?
PrintMessage 43 ;     The boy isn't here, and he wouldn't listen to 
DoneWithTurn
END_COMMAND

COMMAND TELL GIRL    
IsNoWhere 312 ; EVIL WIZARD is in Room Zero?
TurnsGT 105 ; Number of game turns is greater than 105?
NOUNPresent ; $NOUN$ is here?
RandomMessage 53 59 ; Print random message between 53 and 59
DoneWithTurn
END_COMMAND

COMMAND TELL GIRL    
NOUNPresent ; $NOUN$ is here?
NOUNIsNumber 304 ; TRUE if $NOUN$ is NOUN/CREATURE number 304?
FlagOFF 11 ; Flag number 11 is OFF?
PrintMessage 47 ;     You start talking to the thin girl, but she in
TurnFlagON 11 ; Turn flag number 11 ON
DoneWithTurn
END_COMMAND

COMMAND TELL GIRL    
NOUNPresent ; $NOUN$ is here?
NOUNIsNumber 305 ; TRUE if $NOUN$ is NOUN/CREATURE number 305?
FlagOFF 12 ; Flag number 12 is OFF?
PrintMessage 48 ;     You start talking to the tall girl, but she in
TurnFlagON 12 ; Turn flag number 12 ON
DoneWithTurn
END_COMMAND

COMMAND TELL GIRL    
NOUNPresent ; $NOUN$ is here?
NOUNIsNumber 306 ; TRUE if $NOUN$ is NOUN/CREATURE number 306?
FlagOFF 13 ; Flag number 13 is OFF?
PrintMessage 49 ;     You start talking to the short girl, but she i
TurnFlagON 13 ; Turn flag number 13 ON
DoneWithTurn
END_COMMAND

COMMAND TELL GIRL    
NOUNPresent ; $NOUN$ is here?
NOUNIsNumber 307 ; TRUE if $NOUN$ is NOUN/CREATURE number 307?
FlagOFF 14 ; Flag number 14 is OFF?
PrintMessage 50 ;     You start talking to the girl about how much y
TurnFlagON 14 ; Turn flag number 14 ON
DoneWithTurn
END_COMMAND

COMMAND TELL GIRL    
NOT NOUNPresent ; $NOUN$ is NOT here?
PrintMessage 51 ;     Sorry, but she isn't here.                    
DoneWithTurn
END_COMMAND

COMMAND TELL GIRL    
NOUNPresent ; $NOUN$ is here?
NOUNIsNumber 304 ; TRUE if $NOUN$ is NOUN/CREATURE number 304?
FlagON 11 ; Flag number 11 is ON?
RandomMessage 52 59 ; Print random message between 52 and 59
DoneWithTurn
END_COMMAND

COMMAND TELL GIRL    
NOUNPresent ; $NOUN$ is here?
NOUNIsNumber 305 ; TRUE if $NOUN$ is NOUN/CREATURE number 305?
FlagON 12 ; Flag number 12 is ON?
RandomMessage 52 59 ; Print random message between 52 and 59
DoneWithTurn
END_COMMAND

COMMAND TELL GIRL    
NOUNPresent ; $NOUN$ is here?
NOUNIsNumber 306 ; TRUE if $NOUN$ is NOUN/CREATURE number 306?
FlagON 13 ; Flag number 13 is ON?
RandomMessage 52 59 ; Print random message between 52 and 59
DoneWithTurn
END_COMMAND

COMMAND TELL GIRL    
NOUNPresent ; $NOUN$ is here?
NOUNIsNumber 307 ; TRUE if $NOUN$ is NOUN/CREATURE number 307?
FlagON 14 ; Flag number 14 is ON?
RandomMessage 52 59 ; Print random message between 52 and 59
DoneWithTurn
END_COMMAND

COMMAND TELL KEEPER    
AtLocation 62 ; Player is located at Store
PrintMessage 111 ;     You have a short conversation about the weathe
DoneWithTurn
END_COMMAND

COMMAND PURPLEPIEMAN        
InRoom 312 ; EVIL WIZARD is here?
PrintMessage 74 ;     You yell "Purplepieman!"                      
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND PURPLEPIEMAN        
PrintMessage 82 ;     You say $VERB$, but nothing happens.          
DoneWithTurn
END_COMMAND

COMMAND NAMEIPELPRUP        
InRoom 312 ; EVIL WIZARD is here?
PrintMessage 76 ;     You yell "Nameipelprup!"                      
Destroy 312 ; Destroy noun (EVIL WIZARD)
PlusScore 1 ; Add 1 to game score
DoneWithTurn
END_COMMAND

COMMAND NAMEIPELPRUP        
PrintMessage 82 ;     You say $VERB$, but nothing happens.          
DoneWithTurn
END_COMMAND

COMMAND DRINK BOTTLE    
IsCarrying 251 ; COLOGNE BOTTLE is being carried?
PrintMessage 80 ;     You drink the cologne from the little bottle. 
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND MAKE AIRPLANE    
NOT IsCarrying 254 ; PAPER LETTER is NOT being carried?
PrintMessage 89 ;     You don't have any paper that would work quite
DoneWithTurn
END_COMMAND

COMMAND MAKE AIRPLANE    
NOT IsCarrying 229 ; LITTLE BOOK is NOT being carried?
PrintMessage 87 ;     Actually, you don't remember how to make any p
DoneWithTurn
END_COMMAND

COMMAND MAKE AIRPLANE    
PrintMessage 88 ;     You read about how to make a little airplane t
PlusScore 1 ; Add 1 to game score
SwapLocations 254 257 ; Swap locations of nouns  (PAPER LETTER) and (PAPER AIRPLANE)
DoneWithTurn
END_COMMAND

COMMAND ENTER AIRPLANE    
InRoom 258 ; PAPER AIRPLANE is here?
FlagOFF 22 ; Flag number 22 is OFF?
FlagOFF 18 ; Flag number 18 is OFF?
TurnFlagON 18 ; Turn flag number 18 ON
PutInCurrentRoom 259 ; Put noun (RED BUTTON) in current room
PrintMessage 92 ;     You step into the airplane and sit down. It is
DoneWithTurn
END_COMMAND

COMMAND ENTER AIRPLANE    
InRoom 258 ; PAPER AIRPLANE is here?
FlagON 22 ; Flag number 22 is ON?
PrintMessage 124 ;     No! Don't go in that plane while it's still on
DoneWithTurn
END_COMMAND

COMMAND DISEMBARK AIRPLANE    
FlagON 18 ; Flag number 18 is ON?
AtLocationLT 45 ; Player is at location less than none
 OR 
AtLocationGT 59 ; Player is at location greater than Flying
TurnFlagOFF 18 ; Turn flag number 18 OFF
PrintMessage 93 ;     You step out of the airplane.                 
Destroy 259 ; Destroy noun (RED BUTTON)
DoneWithTurn
END_COMMAND

COMMAND DISEMBARK AIRPLANE    
AtLocationGT 45 ; Player is at location greater than none
AtLocationLT 60 ; Player is at location less than Dirt Road
PrintMessage 104 ;     WHAT?!?! Should I send you to a mental hospita
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND PUSH        
NounIsCreature ;     is a creature?
NOUNPresent ; $NOUN$ is here?
PrintMessage 37 ;     Don't do that!                                
DoneWithTurn
END_COMMAND

COMMAND PUSH BUTTON    
InRoom 259 ; RED BUTTON is here?
AtLocationLT 42 ; Player is at location less than Dirt Road
 OR 
AtLocation 43 ; Player is located at Wizard's Pool
 OR 
AtLocation 44 ; Player is located at Wizard's Limousine
PrintMessage 95 ;     You're not exactly an expert pilot, I suggest 
DoneWithTurn
END_COMMAND

COMMAND PUSH BUTTON    
InRoom 260 ; WHITE BUTTON is here?
FlagOFF 19 ; Flag number 19 is OFF?
TurnFlagON 19 ; Turn flag number 19 ON
PrintMessage 97 ;     You reach out to press the little button, prep
 ChangePassageway    4   35; Change EAST passage TO Room number 35 (Wizard's Driveway)
DoneWithTurn
END_COMMAND

COMMAND PUSH BUTTON    
InRoom 260 ; WHITE BUTTON is here?
FlagON 19 ; Flag number 19 is ON?
TurnFlagOFF 19 ; Turn flag number 19 OFF
PrintMessage 98 ;     You press the button again. The garage door ru
 ChangePassageway    4   0; Change EAST passage TO Room number 0 (Nowhere)
DoneWithTurn
END_COMMAND

COMMAND PUSH BUTTON    
AtLocationGT 45 ; Player is at location greater than none
AtLocationLT 60 ; Player is at location less than Dirt Road
PrintMessage 103 ;     Dumb! Dumb! Dumb! You press the button to turn
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND PUSH BUTTON    
InRoom 259 ; RED BUTTON is here?
AtLocation 60 ; Player is located at Dirt Road
PrintMessage 106 ;     You're not exactly an expert pilot, so it woul
DoneWithTurn
END_COMMAND

COMMAND PUSH BUTTON    
AtLocation 63 ; Player is located at Dirt Road
InRoom 259 ; RED BUTTON is here?
PrintMessage 118 ;     Though you have gotten pretty good at flying t
DoneWithTurn
END_COMMAND

COMMAND START LIMOUSINE    
AtLocation 44 ; Player is located at Wizard's Limousine
PrintMessage 99 ;     You simply can't start the car, that requires 
DoneWithTurn
END_COMMAND

COMMAND INFLATE RAFT    
Present 263 ; DEFLATED RAFT is here?
Destroy 263 ; Destroy noun (DEFLATED RAFT)
PutInCurrentRoom 262 ; Put noun (INFLATABLE RAFT) in current room
PrintMessage 101 ;     You blow into the raft. Must be magical, it's 
DoneWithTurn
END_COMMAND

COMMAND DEFLATE RAFT    
Present 262 ; INFLATABLE RAFT is here?
SwapLocations 262 263 ; Swap locations of nouns  (INFLATABLE RAFT) and (DEFLATED RAFT)
PrintMessage 102 ;     You take out the little stopper and squeeze al
FlagOFF 20 ; Flag number 20 is OFF?
PlusScore 1 ; Add 1 to game score
TurnFlagON 20 ; Turn flag number 20 ON
DoneWithTurn
END_COMMAND

COMMAND DEFLATE RAFT    
DoneWithTurn
END_COMMAND

COMMAND DROP        
NOUNisCarrying ; $NOUN$ is being carried?
AtLocationGT 45 ; Player is at location greater than none
AtLocationLT 60 ; Player is at location less than Dirt Road
PrintMessage 105 ;     You drop the $ADJECTIVE$ $NOUN$. It falls to t
DestroyNOUN ; Destroy $NOUN$
DoneWithTurn
END_COMMAND

COMMAND DOWN        
AtLocation 58 ; Player is located at Flying
 OR 
AtLocation 47 ; Player is located at Flying
 OR 
AtLocation 46 ; Player is located at Flying
PrintMessage 107 ;     You make a perfect landing on a nearby road. T
END_COMMAND

COMMAND BUY SHOVEL    
IsCarrying 241 ; FIVE DOLLARS is being carried?
AtLocation 62 ; Player is located at Store
NOUNinRoom ; $NOUN$ is in current room?
Destroy 241 ; Destroy noun (FIVE DOLLARS)
GetNOUN ; Get $NOUN$
PrintMessage 110 ;     You give your money to the shop keeper, and he
DoneWithTurn
END_COMMAND

COMMAND BUY FLASHLIGHT    
ReDirectTo DUMMY_VERB11 SHOVEL    
END_COMMAND

COMMAND BUY MAP    
ReDirectTo DUMMY_VERB11 SHOVEL    
END_COMMAND

COMMAND BUY        
NOT IsCarrying 241 ; FIVE DOLLARS is NOT being carried?
PrintMessage 109 ;     You can't buy anything if you don't have money
DoneWithTurn
END_COMMAND

COMMAND ASK KEEPER IN SHOVEL
AtLocation 62 ; Player is located at Store
PrintMessage 112 ;     "That's a good sturdy shovel," he tells you. "
DoneWithTurn
END_COMMAND

COMMAND ASK KEEPER IN FLASHLIGHT
AtLocation 62 ; Player is located at Store
PrintMessage 113 ;     "Those flashlights come with batteries in them
DoneWithTurn
END_COMMAND

COMMAND ASK KEEPER IN MAP
AtLocation 62 ; Player is located at Store
PrintMessage 114 ;     "Oh, those maps," he groans. "Supposed to be m
DoneWithTurn
END_COMMAND

COMMAND WEAR COLLAR    
IsCarrying 255 ; GOLD COLLAR is being carried?
PrintMessage 122 ;     DUMB!! If the collar nearly chokes a rabbit, w
KillPlayer ; Kill Player at end of turn!
DoneWithTurn
END_COMMAND

COMMAND READ BOOKLET    
Present 271 ; GREEN BOOKLET is here?
RandomMessage 131 135 ; Print random message between 131 and 135
DoneWithTurn
END_COMMAND

COMMAND ERASE ERASER    
IsCarrying 272 ; PINK ERASER is being carried?
PrintMessage 141 ;     You can't do that, and you don't even want to!
DoneWithTurn
END_COMMAND

COMMAND ERASE BAR    
IsCarrying 250 ; BIRTH CERTIFICATE is being carried?
IsCarrying 272 ; PINK ERASER is being carried?
PlusScore 1 ; Add 1 to game score
SwapLocations 250 274 ; Swap locations of nouns  (BIRTH CERTIFICATE) and (BIRTH CERTIFICATE)
PrintMessage 139 ;     Carefully, you rub the magic eraser over the b
DoneWithTurn
END_COMMAND

COMMAND ERASE        
NOT NOUNisCarrying ; $NOUN$ is NOT being carried?
IsCarrying 272 ; PINK ERASER is being carried?
PrintMessage 137 ;     Suddenly you hear a tiny voice come from the e
DoneWithTurn
END_COMMAND

COMMAND ERASE        
NOUNisCarrying ; $NOUN$ is being carried?
IsCarrying 272 ; PINK ERASER is being carried?
PrintMessage 138 ;     As you rub the eraser over the $NOUN$, it vani
DestroyNOUN ; Destroy $NOUN$
DoneWithTurn
END_COMMAND


REM  ----  Flags, Counters, and Variables Used

REM  ----  Flags Used
REM  Flag 1
REM  Flag 2
REM  Flag 3
REM  Flag 4
REM  Flag 5
REM  Flag 7
REM  Flag 8
REM  Flag 9
REM  Flag 10
REM  Flag 11
REM  Flag 12
REM  Flag 13
REM  Flag 14
REM  Flag 15
REM  Flag 17
REM  Flag 18
REM  Flag 19
REM  Flag 20
REM  Flag 21
REM  Flag 22
REM  Flag 23
REM  Flag 24

REM  ----  Counters Used
REM  Counter 1

REM  ----  Variables Used
REM  Variable 1
REM  Variable 2

